home *** CD-ROM | disk | FTP | other *** search
/ Amiga Format CD 7 / Amiga Format AFCD07 (Dec 1996, Issue 91).iso / serious / shareware / programming / aros / exec / remport.c < prev    next >
C/C++ Source or Header  |  1996-09-12  |  1KB  |  72 lines
  1. /*
  2.     (C) 1995-96 AROS - The Amiga Replacement OS
  3.     $Id: remport.c,v 1.4 1996/08/13 13:56:07 digulla Exp $
  4.     $Log: remport.c,v $
  5.     Revision 1.4  1996/08/13 13:56:07  digulla
  6.     Replaced __AROS_LA by __AROS_LHA
  7.     Replaced some __AROS_LH*I by __AROS_LH*
  8.     Sorted and added includes
  9.  
  10.     Revision 1.3  1996/08/01 17:41:17  digulla
  11.     Added standard header for all files
  12.  
  13.     Desc:
  14.     Lang: english
  15. */
  16. #include <exec/ports.h>
  17. #include <exec/execbase.h>
  18. #include <aros/libcall.h>
  19.  
  20. /*****************************************************************************
  21.  
  22.     NAME */
  23.     #include <clib/exec_protos.h>
  24.  
  25.     __AROS_LH1(void, RemPort,
  26.  
  27. /*  SYNOPSIS */
  28.     __AROS_LHA(struct MsgPort *, port, A1),
  29.  
  30. /*  LOCATION */
  31.     struct ExecBase *, SysBase, 60, Exec)
  32.  
  33. /*  FUNCTION
  34.     Remove a public port from the public port list to make it private
  35.     again. Any further attempts to find this port in the public port
  36.     list will fail.
  37.  
  38.     INPUTS
  39.     port - Pointer to messageport structure.
  40.  
  41.     RESULT
  42.  
  43.     NOTES
  44.  
  45.     EXAMPLE
  46.  
  47.     BUGS
  48.  
  49.     SEE ALSO
  50.  
  51.     INTERNALS
  52.  
  53.     HISTORY
  54.  
  55. ******************************************************************************/
  56. {
  57.     __AROS_FUNC_INIT
  58.  
  59.     /* Arbitrate for the list of message ports.*/
  60.     Forbid();
  61.  
  62.     /* Remove the current port. */
  63.     Remove(&port->mp_Node);
  64.  
  65.     /* All done. */
  66.     Permit();
  67.     __AROS_FUNC_EXIT
  68. } /* RemPort */
  69.  
  70.  
  71.  
  72.